home *** CD-ROM | disk | FTP | other *** search
/ The 640 MEG Shareware Studio 2 / The 640 Meg Shareware Studio CD-ROM Volume II (Data Express)(1993).ISO / clang / cxe103.zip / CXVB.FRM (.txt) < prev    next >
Visual Basic Form  |  1992-08-03  |  2KB  |  64 lines
  1. Form1
  2. Form1
  3. Form1
  4. Label1
  5. Input File
  6. text1
  7. Command3
  8. Label2
  9. Input Size
  10. Label3
  11. Label10
  12. This example is very rudimentary, and only serves to demonstrate that the CXVB.BAS interface does, in fact, work.  Simply enter a file name and press test.  Most of the time spent is in allocating memory and reading the file (only the first 20,000 bytes).
  13. Label4
  14. Compressed Size
  15. Label5
  16. Label6
  17. DeCompressed Size
  18. Label7
  19. Label8
  20. Compressed CRC
  21. Label9
  22. Command1_Click%
  23. buff1}
  24. buff2
  25. buff3
  26. CX_COMPRESS7
  27. BUFFSIZE
  28. bufft
  29. CX_DECOMPRESS.
  30. compress_file
  31. outfile
  32. infileO
  33. ibuff&
  34. obuff
  35. tbuff?
  36. ilend
  37. beginZ
  38. CX_SLOP
  39. Break
  40. CX_CRC
  41. endfor
  42. Label1
  43. Label2
  44. Text1_Change
  45. Text2_Change
  46. text1
  47. text2s
  48. Text3_Change
  49. Command3_Click
  50. filename
  51. test15
  52. Label1_Clickc
  53. Label3_Click
  54. Label3
  55. Caption
  56. Label
  57. Label5_Click
  58. Label5
  59. Label7
  60. Label9
  61. Strin
  62. Label8_Click
  63. Command3_Click
  64.